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BEST OF ACE 1782 1/72 
Garnes 


disk $15 (+$7 overseas Air) 


This is the bargain of the year, All of your favorite games 
programs from Jan to July + a very special program too long to 
put in the newsletter, This is a game in BASIC that will really 
drive you berserk, called "Robot" and written by a very 
talented local teenager. This program does not work with 
cassette yet, but the others will be available on a cassette for 
$15 and if we can modify it to work, will include it, 


BEST OF ACE 1782 1/72 
Utiltiy disk, $15 (+$2 overseas Air) 


This outstanding disk includes Jonestrm, the smart 
terminal program by Frank Jones, other utilities from our 
issues from Jan to July, and a very good Financial, Checkbook 
and Budget programs written by a New Jersey Accountant, Al 
Giordano for a client and donated to ACE, The only difference 
between this disk and programs you buy is the lack of 
documentation and they are not as fancy! Not available on 
cassette since the programs are designed mostly for disk use. 
The disk will also include the Random access database example 
by Kirt Stockwell 


Get both on a double sided disk for $70!! 
All proceeds go to a dedicated Bulletin Board system, 





Send your orders to our program exchange chairpersons: Chuck 
and Jody Ross, 2222 Ironwood, Eugene, Or 97401, 


ALL OF ACE 


One of our members in Hawaii has gone to the monumental 
task of taking all of the ACE issues and having them bound! A 
very impressive book, at least one inch thick with everything 
to date!! Only $12 shipped book rate (by ship from Hawaii) +43 
first class mail or +$4 overseas Airmail. Send your money to: 

George Suetsugu 
45-402 Apuapu Street 
Kanoehe, HI 96744 


Do Not send money to ACE for the Book 


All proceeds from the above will go into the special fund 
for the Bulletin Board System. Anyone who wishes to donate a 
little extra can do so!! 


News bits 


There has been so much new software and hardware for the 
Atari being released that it is hard to keep up. Several 
companies are coming out with peripherals that expand the 
hardware capabilities of your Atari. Last month we reported 
BIT-2*s new 80 col, board that plugged into the third slot. 
Now Compu-Mate 6305 Arizona Ave, L.A. Ca., 90045 has a new 
expansion interface that is expandable. The basic unit comes 
with a printer interface that can be configured to use any 
printer regardless of the word-processor you use by allowing 
you to make a table to translate commands. It has a RS-232 
interface that uses simple commands rather than XIO's; 
however it will not run present software that uses XIO 
commands, the Basic unit is #789. For $489 you get the basic 
unit + an 80 col board, but this also needs special software to 
run-eg. an 80-col version of a word-processor, but can work 
with basic: They will also have a 64K spooler and a light pen 
soon, Units can be upgraded at any time. 


Another expansion unit is a double-density parallel driven 
disk drive by Leading Edge (54427A Spicewood Springs Rd. #532, 
Austin, TX 78744, $870), This was designed by Dave and Sandy 
Small of OutpostiAtari fame, and consists of an expansion 
interface that sits on top of your 800 and connects to your OS 
slot, a modified OS card, and one 5.25" drive. The interface 


has extra slots for increased expansion capabilities, Percom 


(11220 Page Mill Road, Dallas, TX 75243 are now shipping their 
double density drive ($800), 


We have received three new books for review just before 
press time. They all look to be excellent and will be reviewed 
in the next issue, but all appear to be worth buying. For the 
beginning BASIC programer, with specific examples on how 
Atari BASIC differs from others, Instant BASIC-2nd 
Astounding! Edition by Jerald Brown (dilithium press, $13) is 
beautifully written and clearly presented. Atari Games and 
Recreations by Herb Kohl, Ted Kahn and Len Lindsay (Reston) 
is an impressive 337 page book that really teaches you to 
program, using games as examples, rather than teaching you to 
program games. Games for the Atari (ELCOMP, $8) is for more 
advanced readers who want to learn more about sound, 
joysticks, PM graphics, machine language interfacing for 
subroutes, etc.-and have many new games! All will be 
reviewed in the next issue, as well as a new all machine 
language Intelligent Terminal Program called T.H.E, by Binary, 
and more on DataPerfect, the review of which begins in this 
issue, 


Attention Australian Members 


Anew ACE chapter with a fine newsletter would like you to 
know about them: 

ACE (N.S.W,) 
c/o Paul Phillips, 78 Ayres Rd., St. Iyres, N.S.W. 2075 
(449-6286) ; 


Micro-Probe 
C3/41 Osborne Ave 
Glen Iris, vitoria, 3144 


This is an incredible effort by David Jones-Ellis-a 50 to 70 
page each quarterly with no advertising, very technical and 
mostly machine language stuff that is more advanced than 
anything in the US: $12 year- for US readers who really want 
the machine language stuff, write and ask what you need to 
pay- the first two issues are fantastic. 





Benioff At Large (Mr+ATARI») 


Heilo, and welcome to another exciting issue of ACE, and 
another stimulating Benioff At Large (Mr.ATARI). This month 
we will be adding a NEW feature to the column called "Ask Mr. 
ATARI". This feature will allow you, the readers, to write to 
me and have questions answered in ACE!! Is that a thrill, or 
what (Wow !-ed.) 


Among new software products being released for the 
ATARI are the following: 


L)NEW from InfoCom software!" Infocom, Inc. is one of the 
largest software text adventure companies making software 
for microcomputers. They make software for almost all of the 
systems and now this month have released their adventures for 
the ATARI! They released three programs. Zork I, and Zork II, 
are underground adventure programs. You can type in full 
sentences to the computer, and then it responds with the 
answer. One word for this is! Fantastic, I bet you thought I 
was going to say "AWESOME!". But, hold on. DEADLINE IS 
BEYOND AWESOME. There is just too much to tell. It comes 
in a manila file holder, allowing for about ten different items. 
There are notes from attorneys, police, coroners, and even five 
tablets found at the scene of the crime. What crime? Å murder 
has taken place, and you must find the murderer in a huge 
mansion in real time. People walk around, phones ring, 
newspapers are delivered, and best of all, you can examine and 
interview all of the people/things. It is great. Infocom is in 
Mass, Their address is ! 46 Faneuil Hall Marketplace, Boston, 
MA, 02109, Ask for Marc Blank: 


Datasoft will release three new programs this month, and 
very soon a TRAC BALL!!! They are releasing Pacific Coast 
Highway, a Frogger re-do. It is as close to frogger as you can 
come. Also are releasing Canyon Climber, a Donkey Kong, and 
an excellent Shooting Gallery game. All of these are super. I 
don’t have them yet, but have seen several demonstrations. In 
about four months they will release a basic compilor. All of 
the things that DataSoft plans appear excellent. 


Recently I was shown several programs which are excellent 
but I really don’t know who did them or who is selling the 
programs, Froggie is a Frogger rip off directly. It is done by 
Eddie Fries, but this is all I know. Another is a game called 
Megalegs by Mega Software. It is an excellent Centipede rip 
off but I don’t know who Mega is. Third is a program called 
Alien Swarm. It is a very addicitive and original game by In 
Home Software, but who are these people? 


This month I bought another On-Line adventure called 
Ulysses and The golden Fleece. It is a three disk Wizard and 
the Princess. It is very good, and if you liked Wizard you will 
love Ulysses: 


Gebelli told me that they will be releasing a new version of 
Andromeda, thank goodness, and that their game Pathfinder 
will be available soon. Gamma Software sent me a copy of 
their new game "Hockey". It is a two or more player hockey 
game for 400 w/cassette. 


Atari is rumored to be designing a new disk drive half the 
size of the 810. Also, the new drives from ATARI now being 
shipped contain an ANALOG, It is said that instead of the 
disk drive error of 144 coming on it just says "Lee Pappas 
greets you", 


Speaking of Analog, they just released issue 6 and I am in 
it!! So run to your local store and pick it up: Oh, all it is in the 
April column reprinted. 


The new ATARI printer will be the Centronics 739. More 
details on this later. Atari’s new machines will be released in 
December. The 1000 and 600 are the talk of the town. 
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Loose Bits 
by Stacy A. Goff 


Since stepping down as ACE president I have been busy 
getting established in a new job} more on that later but first, 
here is a brief report 9n NCC/Houston (National Computer 
Conference), 


I managed to put myself in Houston for several days of 
what has been acclaimed as the largest computing show in the 
history of the USA. What I saw there will take a while to sink 
in, but one thing is clear! Microcomputers have caught the 
interest of the computing world! So what, you might ask? 
Well, for years the NCC has been the stronghold of large-scale 
computer systems; even minis had to beg to be involved, not 
too long ago. Year before last micros were allowed to 
participate, but were relegated to the basement. This year, 
micros were the FOCUS of the entire show. Most mainframe 
computing companies displayed some type of micro, and the 
crowds in front of the most popular micros were thicker than in 
front of the kissing booth at the county fair. 


Many of the new products were worth noting; you will no 
doubt read definitive reports in your favorite press. Here are 
a few choice observations: 


* The new DEC micros, from the Rainbow to the Professional 
350, ranging in price from approximately $3900 to 5000. This 
system, once available, will be the hottest one on the market. 


* The new Commodore 64, a 64K big brother to the VIC, with 
excellent graphics, optional CPM compatibility, and a price tag 
of $599 will force a quantum reduction in the price of 
computing: 


* Many portable systems were in evidence, from the $800 IXO 
to the Osborne lookalikes to the $5000 Grid. This area is just 
beginning to take off. 


* The Japanese companies appeared in force, especially Sony 
and Hitachi, with their new systems and 3 1/2 inch 250K flippy 
disks. Atari should jump on these to replace the current 
woefully inadequate 82K drives, 


Many other wonderous systems could be seen. Based upon 
my experiences, I'll make the following predictions and 
observations: 


o the cost of systems is going down, in quantum leaps 

o most computer companies are concentrating upon the 
business, rather than home market 

o word processing is STILL the biggest computer-selling 
application 

o companies that expect to survive should standardize 
operating systems and languages 

o by Jan. 83 M-DOS will emerge as å new ipso-facto 
standard, edging out CP/M 

o Just one year later, UNIX (and similar systems) will 
replace M-DOS in popularity 

o More computers will be sold in 1983 than exist in the 
entire world today 

o the boom is just beginning 


I first encountered the new pyramid sales group for TI 
computers at the San Francisco Computer Faire. I thought it 
was a novel way to sell computers, by selling dealerships, and 
worried a little about the prospect of unknowledgeable folks 
selling computers. Besides, there is not really enough 
‘headroom’, or markup, to really make a dealership pyramid 
work: Well, four months later, they have hit the Northwest, 
and have hit hard. Out-of-work used car salesmen, polyester 
jackets and white shoes and all, are selling computers, 
programs and dealerships at fairs. office equipment shows, and 
on street corners. The good news is that they are setting up 
support groups for the systems they market. I only hope they 
don't do more harm than good, 


As I mentioned earlier, I have been spending time getting 
acquainted with anew job. I stepped down as ACE president 
because of my time out of town, but have remained active in 
the group. I am now a information systems training 
consultant, and spend some 50% of my time on the road, 
traveling all over the continent. I’ve decided to take 
advantage of my trips to continue ‘spreading the word’, I 
began by checking the ACE mailing list before visiting an area, 
and recording members names and phone numbers. Then, time 
allowing, I have contacted those members and visited with 
them while in their town. This has worked out very well; we 
have had some spirited discussions, and I enjoy kibbutzing 
about our latest doings. For example, I called a Toronto 
member, and he set up a very enjoyable get-together with two 
local Atari groups. Visiting with new friends with common 
interests is yet another pleasure I derive from my Atari, 





DATA PERFECT 
REVIEW 
by Kirt Stockwell 


During the past month it has been both my pleasure and my 
pain to review one of the most sophisticated pieces of software 
I’ve ever seen for the Atari. As a professional 
programmer/tutor, I appreciate the complexity of a program 
such as this, The program itself is quite good, and the 
capabilities for truly worthwile data manipulation are 
enormous. The program can be configured by the User in all 
three areas: Input format, Calculations, Output format. Sorting 
is also supported. Another important feature, that I feel many 
may want to take advantage of, is the compatibility with 
LETTER PERFECT. As home computers begin to be used as 
computers more often than as game machines, the potential 
offered by programs such as this will be invaluable, 

DATA PERFECT reacts to and interfaces with the user 
almost exactly the way LETTER PERFECT does, so you won't be 
in for too many suprises there. Formatting the input is 
relatively straight-forward, and once this is accomplished, the 
actual entry of data is very simple. The formatted input screen 
is a feature that I like to include in my own programs, and is 
part of a concept we call "USER FRIENDLY". 

Overall, I would give an excellent rating to this very 
complex, very well executed piece of programming. 

About the documentationssereresserees 

After two years reading obscurely written reference manuals 
for obscure software and operating systems, then teaching 
what I had learned, I feel that I am fairly good at tracking my 
way through the jumbled obfuscation that most program authors 
write: The manual provided ranks with the classics: The 
XEROX CPV Reference Manual, the IBM 360/270 Time Share 
Reference Manual, the Atari Basic Reference Manual. Any of 
you who (whom?) have run through, or into, these gems will 
know that the problem is. The person or persons who wrote the 
manual knew the program so intimately that they forgot that 
there are things that WE don’t know about their 
programs/systems. 

I'm still trying to fight my way through the manual, and will 
give a more detailed report next month. Meanwhile, if you want 
a VERY GOOD data base processor, this one is. If you are 
willing to spend several weeks of fairly intensive and 
consistent study, you can learn to use this program effectively. 
If youneed a powerful data base processor that has 
mathematical capabilities, DATA PERFECT should be well 
worth the effort that will be required in order to use it, 


RANDOM ACCESS 
SAMPLE PROGRAM 
by Kirt Stockwell 


As you can see, from the short sample below, random access 
processing on the Atari is a simple matter... Actually, I got 
spoiled rotten using the big XEROX at school. That silly thing 
will do practically all of the work for you: All you have to do is 
specify the file type, and the key field/s when opening the file, 
and the computer does the rest, including automatic ascending 
key sorting when closing the file. Alas, the world of MICRO is 
the world of the do-it-yourself'er; you have to do it ALL 
yourself. There will be a slightly modified version of this 
program on one of the disks we will be offering for sale soon ( 
to raise the money for the dedicated bulletin board ), 

The version that will be on disk will be set up for keeping all 
the pertinent information on your friends and relatives. 
Meanwhile, if you can type this long turkey in without going 
crazy and/or completely messing up, then you're a better man 
than I, Gunga Dinn !!! Next month I will have the room, time, 
and energy to discuss this with you in depth. Until then, look 
this over and either some lights will blink on, or you will get 
totally lost, Feel free to write us if we lose you, because if we 
lose too many, we will slow down and/or go into more detail. 

In the listing provided, the short, heavy black lines are right 
arrows and down arrows, (three each). The text in quotes 
between lines 300 and 372 should be entered in INVERSE 
VIDEO, as these characters are the prompts for the formatted 
screen input: The program is basically self-explanatory, if you 
are macho enough to type it all in: Have Fun !!!! 


BULLETIN BOARD 


The ACE Bulletin Board has been growing by leaps and 
bounds. After A.N.T.I,C Magazine (297 Missouri St., San 
Francisco, CA. 94107 #15 6 issues) had an article about ACE 
and the ACE Bulletin Board, I have barely been able to get to 
my computer! Because of the great demand, we have decided to 
have have a fund raising campaign to buy a dedicated system 
that will be on 24 hours a day and be owned by the club. As 
you may know, all of the money now goes to the newsletter, 
and since we do not accept any advertising, we must raise 
money in other ways, I have started the process by getting 
call-fowarding for my computer phone, 50 other members can 
have the pleasure of being "SYSOP" when they want to and 
when I am on vacation: 


We want to raise enough money to buy a 400 or 800, modem, 
interface, etc, If at all possible, we will try to get å 
double-density or 8" disk drive. If any of you out there have a 
prototype drive that we could get cheap, that would be great, 
Remember, this will be a dedicated system, which means that it 
doesn’t need to be compatible with Atari disks- just with 
itself, The more we can store, the more programs we can offer 
you: Also, if anyone has any used equipment they would like to 
get rid of cheaply, let me know, We have enough members that 
we should be able to raise the money quickly! Although others 
claim to be larger, we keep it quiet and are actually the largest 
group by far- it is just that most of our members are in small 
towns and don't come to meetings easily- but the Bulletin 
Board is a great way to ask questions and keep in touch, 


There is also an Atari Users’ Group Logo contest. The 
winner will get The Communicator Kit, plus free CompuServe 
access, etc. Each group can send 2 logo’s in, but it must be in 
by Aug 1, 1982, If interested, send a logo to our president, 


Kirt Stockwell. 


LOADER.C AND LOADER-D 


These two functions are used to load binary data files into 
BASIC programs. A typical use of these functions is to take a 
binary load file (created by an assembler or by the DOS "K" 
binary save command) and make it executable from BASIC, 
We've all spent too much time entering decimal data 
statements to get machine language execution in BASIC. These 
utilities take the drudgery out of the process if you have å 
binary data file to start with. 


LOADER.D converts the binary data file into a file in 
BASIC LIST format. The file consists of DATA statements 
representing the bytes of the binary data file. The DATA 
statements are preceded by a FOR loop which will READ each 
byte and POKE it into the appropriate memory location, The 
BASIC LIST file may be ENTERed into the BASIC program of 
choice, The user can have the program load the data by 
GOSUBing to the ENTERed lines. Dependinc an the size of the 
file to be leaded, this GOSUB could cause a bit of a delay» 


TOADER.C takes the process one step farther. If the 
binary load file represents relocatable object code (ie. it 
operates correctly no matter where it is loaded in memory), 
LOADER.C will load the data into a BASIC string (say 5%) by 
execution of USRIADR(S$) 4), LOADER.C creates a BASIC 
LIST file containing the DIM and actual assignment statements 
of the variable chosen for loading of the data, 


LOADER.D will prompt the user for the name of the input 
binary load file and the name of the desired output BASIC LIST 
file. The user will then be prompted for the starting line 
number of the BASIC LIST file, so choose a line number which 
will not conflict with those of the program into which you wish 
to load the data, 


LOADER.C will go through the same sequence of prompts. 
It will also ask for the name of the string variable in which the 
data will be loaded, The user does not need to specify a 
dimension for the variable since LOADER.C will compute it 
automatically, 


If you LIST LOADER.D and LOADER.C you will notice the 
machine language used by the functions was loaded in by using 
LOADER.C, You will also note that because of the string 
assignment operations, there is no initialization delay in 
loading the machine language code. 


--Stu Greenberg 


Because the above loader programs have machine language 
subroutes, it couldn’t be listed but will be on the "Best of 1782 
1/2 Utility Disk". 


The Random Access program by Kirt Stockwell was too long 
to list out also, and will be found on the same disk. 


Send a business- size SASE to 
the Ross’ for the news updated 
ACE Library List!! 


Best of ACE-1781, still 
available, Disk or Tape, So! 


July Meeting 


Meetings are always on the znd Weds night at 7:30. The 
next meeting will be on July 14, at the Northwest Natural Gas 
Building on Goodpasture Island Road next to K-Mart. It is off 
Delta Highway one Exit from Eugene past Valley River Center, 
See the Axlon 128K RAMDISK in action, new J oysticks, several 
new books, the bulletin board in action with the two modems 
mentioned above plus anythig else that is new or what you 
would like to share, 


In August, we will have our annual picnic instead of a 
meeting. Contact Kirt Stockwell if you want to be on the picnic 
committee. 





BRIAN'S ARCADE 


This month I received four awesome new games, the three 
new games from Data-Soft (Canyon Climber, P.C+H.(Pacific 
Coast Highway) and Shooting Arcade). I also got Bug Attack, 
the popular Apple game by Cavalier Computer. Next month in 
my article I will be doing a joystick test between the Atari 
joystick, the Video-Command joystick from Zicron International 
and a brand new joystick called Newport Prostick from 
Game-Tech: 


Canyon Climber is an awesome new arcade-style game which 
has simularities to none other than the most popular arcade 
game, Donkey Kong: So far I have found three different 
screens. In the first screen your goal is to place dynamite on 
each side of five different bridges. After you have set all of 
the dynamite on the bridges, you must climb to the top of the 
screen and push the plunger down, All of the bridges will blow 
up and you advance to the next level. Your only obstacle in 
this level is a bunch of angry billy goats, If they see you 
coming on their territory they will approach you head on and 
try to buck you off of the bridge. How can you overcome this 
major obstacle you ask- why you simply press your joystick 
button at the right time and you will jump over the goat with no 
injury. On some of the harder levels the goats get smarter and 
when you try to jump the goat will simply turn around and buck 
you off the canyon. Your only safe place on the entire screen 
is the ladders. 


After you have cleared that screen you will get to the 
second screen in the three screen sequence. In the second 
screen angry indians shoot arrows at you as you head towards 
the ladders. On the left side of this screen are three things 
that look like little c's. If you jump up and grab a little c you 
will now have your little bow that catches the arrows that the 
indians shoot at you: While you have the bow you cannot jump 
or climb any ladders, kind a like when you have the hammer in 
Donkey Kong: One thing I don’t like about getting the bow is 
that it tends to disappear just when you are about to catch an 
arrow. But the good thing about the bow is you get 500 points 
for catching each arrow whereas jumping over the arrows you 
only get 200 points. 


After you clear the arrows you will be hoisted up by an 
unknown force to the third screen. In the third screen your 
objective again is to get to the top. You have to jump over 
crevices and jump up onto other levels of the canyons. You 
have to jump about thirteen times onto different levels of the 
canyons and over crevices of the canyons. There is only one 
thing in your way, the birds. The birds don’t want you to get to 
the top so they drop what I think is bird turd but it may be 
rocks. If the bird turd or rocks hit you you will instantly fall 
off the canyon and go crashing to the ground. If you clear this 
level you will receive an extra man and after this level you 
will go back to setting dynamite on the bridges. 


The graphics in Canyon Climber are awesome. The goats are 
pretty realistic} they even nod their heads, the indians have 
these really cool looking head dresses with feathers. The birds 
on the third level have little feet and they even flap and tuck 
in their wings. The little man you control is also pretty 
realistic- your little hands move from rung to rung up the 
ladder and you even move your arms when you run: 


The sound in Canyon Climber is not the best I’ve ever heard 
but nonetheless it’s pretty good. I esp@cially like the 
footsteps you make when you run. I also like the sound it 
makes when you fall to the ground with a loud thud. 


Canyon Climber is written by Tim Ferris and is available 
from Data-Soft Inc. for $29.95 on disc and $24.95 for cassette, 


Pacific Coast Highway or P.C.H. is also an excellent arcade 
game. There are two different screens that I have found. The 
first screen is you have to move your frog or turtle or rabbit 
or whatever it is across an eight lane highway. On the highway 
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you have to avoid police cars, formula one race cars, funny cars 
and dragsters (the only safe place on this screen is the 
sidewalk in the middle of the screen). If you run into one of 
these cars you will die and an ambulance siren and all will 
come out and I guess take you to the hospital: After you get 
to the top of the screen you have to run into what looks like å 
rabbit then you will move onto a different screen: 


The second screen is a river crowded with motor boats (your 
only safe place in this screen is I guess it’s a dock in the 
middle of the screen). You have to make your animal jump onto 
the boats without falling into the river. Then when you get to 
the top of the screen you have to quide your animal to the same 
thing as in the screen before, After the river you will move 
back to the highway and the cars. When you get to the second 
highway screen you will notice a couple things different, The 
first that the cars move much faster than the earlier screen, 
You will also notice that the sidewalk is moving right or left 
and is no longer a safe place to rest, 


In the second river screen the boats move a lot faster and 
the the dock in the middle of the screen also moves right to 
left and is no longer a safe place to rest, 


P.C.H. has some exceptional graphics, I really like the cars 
and the boats. You can tell what kind of car it is and what 
kind of boats they are. For instance you can tell which of the 
cars are formula one racers by the shape and speed of the car, 


The sound in p.C.H. is also very good. Once the program is 
loaded up it goes into a cute little song. There is also a little 
tune at the beginning of each level and at the beginning of each 
new animal: One of the options I really like in P.C.H, is the 
two player option where two players play at the same time. 
It's kind of like a race to the top. 


P.C.H. is written by Ron Rosen, It is available from 
Data-Soft for $29:95. 


Shooting Arcade is exactly what the title says: You control 
a little pistol and objects like ducks, rabbits, elephants, etc. 
The game uses very good sound and graphics. If you like shoot 
‘em up games I highly recommend this one. It also costs $29.95 
and is available from Data-Soft, 


Bug Attack is another very good arcade style game. It is 
available from Cavalier Computer for $29.95. Bug Attack ina 
way resembles the ever popular arcade game Centipede. 


In the game you control a little spider and you are being 
invaded by a number of different bugs. Sometimes the bugs 
attack by themselves and sometimes they attack in large 
groups. So far my worst enemy has been the millipedes. 


While you are playing the game you will always hear a little 
song in the background. The song you hear always depends on 
the bug you are dealing with at the time, 


Bug Attack uses very good graphics and awseome sound, 
For those of you can’t wait for Centipedes from Atari I 
recommend you run down to your local software shop and pick 
up a copys 


Well thats all for this month. Next month I’ll have a 
joystick comparison and also Marc Benioff’s new game The 
Nightmare, 


Brian Dunn 





### FROG ### 
by Stan Ockers, Rockport, Il 


In ‘Frog’ you play the part of an extremely hungry frog. 
Your object is to eat all bugs before they reach you: You score 
points depending on the difficulty level. The level of 
difficulty can set at the start of the game. Either a joystick or 
paddle controller can be used although I prefer paddles. 


‘Frog’ contains some special techniques to add special 
touches to the game, The bugs are made to blink on and off by 
a VBI routine that changes the bugs color to background color 
and back; The VBI routine also has an important function in 
connection with another routine, the Display List Interrupt 
routine, 


The display list is modified (lines 700-720) to change the 
text area to two mode 2 lines and also to set display list 
interrupts at three points down the vertical height of the 
screen. When these interrupts occur, the DLI routine changes 
the background color depending on a counter which counts the 
DLIs. During the vertical blank period this counter is reset to 
zero, ready for the next screen. This technique gives seperate 
colors to the sky,water and score areas, 


The character set is changed so the frog can be printed in 
graphics mode 1. In this mode you have a choice of upper case 
& punctuation or lower case and graphics symbols. I usually 
pick the former and change the punctuation starting with that 
above the numerals on the keyboard, (I leave the quotation 
mark alone). The set must first be moved from ROM to RAM 
and I use a machine language routine (stored in ZZ$) to do this 
(line 3000), 


To move the tonque in various directions you need to keep 
track of a number of print positions. I put these locations in 
strings} a set of X's and Y's for each direction (lines 100-120), 
The positions are recovered from the strings by using the ASC 
function (see lines 1002 & 1004), 


A very useful function in Atari Basic is the the ability to 
restore data values to the beginning of a certain line. This 
function is used in picking up the starting positions and 
increments of the bugs (344 to start or line 347 to continue), 
Flags [F(I)] keep track of the condition of the bugs; 0 means 
the bug is not active, 1 - it’s in motion and 2 means it hit 
something: 


WAIT and BUG are counters that skip over the start-a-bug 
and move bug sections. When the counters reach zero å NEW 
bug is started or all bugs are moved and the counters set to 
MAXWAIT & MAXBUG respectively. The larger these 
maximums, the slower things go and the difficulty level is 
increased by reducing MAXWAIT & MAXBUG. 


I hope you find something useful in the code of this 
program as well as enjoying the game itself. 


Assembly Language Routines for VBI 
-by Stan Ockers for Frog 


0207 10 COLOR3 = $0207 
0208 20 COLOR4 = $0208 
Q0CE 30 CNTRi = $00CE 
OOCF 40 CNTRZ = $00CF 
00D0 50 BUECOL = $0000 
0001 60 DLICNT = $0001 
DANA 70 WSYNC =  $040A 
DO1A 80 COEK =  $D01A 
0000 90 z= $0400 
0100 ; VBI INSERTION ROUTINE 
0400 48 0110 PLA + Ignore parameter count 
0601 ADOA 0120 LDY #$0A + Lo byte VBI routine 
0603 A206 0130 LDX #$04 + Hi byte VBI routine 
0405 4907 0140 LDA %07 ; Deferred VBI 


0607 4C5CE4 0150 


JP SENG 


H 0.5, inserts VBI 


0160 $ VBI ROUTINE TO MAKE BUGS FLICKER 
060A ADC702 0170 VBI LDA COLOR 


$ Is bug color as 


0400 CDC802 0180 CMP COLORS $ background color? 
0610 F010 0190 BEQ BLACK + Yes 
0612 CACF 0200 DEC CNTRZ + Count down 
0614 D019 0219 BNE OUT + till next black out 
0614 A905 0220 LDA 45 + Reset off counter 
0618 SSCE 0230 STA CNIRI 
0614 ADC80Z 0240 LDA COLOR4 $ And black out 
061D 8DC702 0250 STA COLORS 3} bugs 
0620 DOOD 0240 BNE OUT 
0622 CCE 0270 BLACK DEC CNTRI + Count down till 
0624 D809 0280 BNE OUT + next on period 
0626 A90A 0290 LDA #10 $ Reset on counter 
0628 85CF 0300 STA CNTR2 
062A ASDO 0310 LDA BUGCOL $ Turn bugs back on 
042C 800702 0320 STA COLOR3 
042F A900 0330 OUT LDA 4400 3 Reset DLI counter 
0631 8501 0340 STA DLICNT 
0433 4C62£4 0350 JP $E462 + Back to 0454 
0360 } DLI ROUTINE TO CHANGE BKGND COLOR 
0434 48 0370 PHA + Save A 
0637 BA 0380 TXA 
0638 48 0390 PHA ; Save X 
0639 A4D1 0400 LOX DLICNT $ Index with color 
0638 BD4B04 0410 LDA TABCOL,X $ Get color 
063E 800404 0420 STA WSYNC 
0641 8D1AD0 0430 STA COLBK + and change bkond 
0644 EB 0440 INX + Set up for next color 
0645 8401 0450 STX DLICNT 
0647 48 0460 PLA ; Restore X 
0448 AA 0470 TAX 
0649 48 0480 PLA + Restore A 
0644 40 0490 RTI + And return 
0500 ; TABLE OF COLORS 

0448 9B 0510 TABCOL «BYTE $98,$74 
=0207 COLOR3 =0208 COLOR4 =00CE CNTR1 =Q0CF CNTR2 
=00D0 BUGCOL =00D1 DLICNT =DA0A RSYNC =D01A COLBK 

040A VBI 0622 BLACK 062F OUT 0448 TABCOL 








10 REM XKODDCDOCDNDDNONK 

20 REM xx FROG xx 

30 REM xx STAN OCKERS xx 

35 REM xx  &/82 xx 

40 REM XXXAXAXAXAXXXAXXX 

49 REM VBI AND DLI ROUTINES 

50 FOR 171536 TO 1613:READ A:POKE I,A:NEXT I 
POKE 206,43POKE 207 ,4¢A=USR( 1934) 

60 DATA 104,160,10,162,6,1469,7,76,92,228,173, 
199,2,205,200,2,240,16,198,207,208,25,169,5,1 
33,206 

70 DATA 173,200,2,141,199,2,208, 13,198, 206,20 
8,9,169,10,133,207,165,208,141,199,2,169,0,13 
3,209 ,76,98,228 

80 DATA 72,138,72,166,209,189,75;6,141,10,212 
141,26208,232,134,209,104,170,104,64,155,15 
2,24 

89 REM CHANGE CHARACTER SET 

90 GOSUB 3000 

99 REM STRINGS HOLDING PRINT POS. 

100 DIM C$(7),X$(7) ,Y$(7)  X5$(7) ,YSS(7) , X7$07 
) 7407) ,X6$ 07), Y6$(7) 214607)  Y146(7) , XLOGC7 
),Y10$(7) 

105 DIM X11$(7) ,Y119(7) ,.X9$(7) ,Y9S(7) ,BX(7),B 
Y(7) 

110 FOR I=1 TO 74X5$(1)=CHR$(8+1) SYS$(1)=CHRS 
(B41) $X7$ (T)=CHRS (841) $Y7$(T)=CHRS(9) $X6$ (T= 
CHR$(8+1) 

115 Y4$(1)=CHRS (10-1) $X14$(1)=CHRS(9) $Y14$(T) 
=CHR$ (10-1) $X10$(1)=CHRS (10-1) $Y¥10$(1)=CHRS (1 
1-1) 

120 X11$¢1)=CHRS (10-1) $¥11$(1)=CHR$(9) $X9$(T) 
=CHR$ (10-1) 3¥9$(1)=CHR$(8+1) 

129 REM CHOOSE INPUT DEVICE 

130 GRAPHICS 18:POKE 756, START/Z54 NEXT I:POS 
ITION 6,31? 46;"choose"iPOSITION 4,53? 46;"1 

paddle" 

131 REM ‘paddle’ & ' joystick’ IN INVERSE CHAK 


135 POSITION 8,63? #4;"or"SPOSITION 4,71? 46; 
"2 joystick" OPEN #1,4,0,"K" 

140 GET #1,A3IF A<49 OR A>50 THEN 140 

150 POSITION 9,93? $6;CHR$(A) $ INDEV=A-48 

199 REM PROGRAM INITIALTZATION 

200 DIM F(7),S1$(10) ,BP$(4) $BPS="burp" SMAXHAL 
T=6+MAXBUG=30 

210 RESTORE 220:FOR I=1 TO 10SREAD AIST$(DC 
HRCA) SNEXT I 

220 DATA 7,5,6;0,1,3,2,040,4 

280 POKE 208,37:S=1REM 208 IS BUG COLOR 

285 REM INITIAL DIFFICULTY SELECTION 

286 GRAPHICS 1:POKE 708,229+POKE 712,159;GO0SU 
B 700;GOSUB 400 

289 REM RESTART GAME 

290 FOR I=1 TO 7:F(1)=0:NEXT I4SCORE=0:NUMBLG 
=04BONUS=50 

300 GRAPHICS 1:POKE 756,START/254;GOSUB 700:X 
$=X5$1YS=YSSIPOKE 708,2293POKE 709, 54:P0KE 71 
0,227 \POKE 712,155 

305 REM DRAH FROG 

306 GOSUE 2000iPOSITION 8,5:G0S4B 905 

308 REM MAIN LOOP 

309 IF INDEV=2 THEN GOSUB 500:GOTO 320 

310 S=INT((PADDLE(0)-45)/20) IF S>7 THEN S=7 
312 IF S<i THEN 5=1 

314 S=8-5 

320 POSITION 8,51:G05UB 900+5 

325 IF INDEV=2 AND STRIG(0)=0 THEN GOSUB 1000 
330 IF INDEV=1 AND PTRIG(0)=0 THEN GOSUB 1000 


339 I=0:1F WALT>1 THEN RAIT=HAIT-1:G0T0 350 
340 HAIT=MAXHAIT 

341 I=I+1tIF 178 THEN 350 

342 IF F(I)=0 THEN 341 

345 IF F(1)=2 THEN 347 

346 RESTORE B00+1READ DX,DY,BX,BYGPOSITION E 
X, BYS? $43 CHR$(129) $F (ID=23BX(D=BXBY(D=BYG 
GOTO 341 

347 RESTORE 800+ISREAD DX, DY:POSITION BX(1),6 

YD? #43" “SBX(T)=BX(T)4DXSBY (T)=BY (1) 4+DY 
348 POSITION BX(T) ,BY(I)$? #6;CHR$(129) SIF BX 
(1)>5 AND BX(T)<13 AND BY(T)25 AND EY(I)<11 T 
HEN 370 

349 GOTO 341 

350 IF BUG>1 THEN BUG=BUG-1:GOTO0 360 

352 BUG=MAXBUG:IF NUMBUG=7 THEN 360 

354 ISINTERND(0)&7)+131F F(I)>0 THEN 354 

356 F(1)=1+NUMBUG=NUMBUG+1 

360 GOTO 309 

369 REM BUG GOT TO FROG - 

370 POSITION 8,54? #43". ."SFOR I=i TO 6+POKE 
708,38:S0UND 0,100,12;105FOR J=1 TO SO+NEXT 
J 

375 POKE 708,36S50UND 0,150,12,10:FOR J=1 TO 
10SNEXT JENEXT ISSOUND 0,0,0,0 

398 GOSUE 400GOTO 290 

399 REM PROMPT FOR NEW GAME 

400 POSITION 4,133? #4;"PRESS start" POSITION 
6,143? #63"TO PLAY" SREM USE IN INVERSE CHAR, 
IN THESE TWO LINES 

401 POSITION 4,143? #4;"PRESS select" +POSITIO 
N 3,173? #6;"FOR DIFFICULTY" 

402 POKE 53279,8:K=PEEK(S3279) SIF K=6 THEN 42 
0 

404 IF K=5 THEN MAXWAIT=MAXWALT~1 > MAXBUG=HAXE 
UG-SiIF MAXBUG<S THEN MAXBUG=30 ¢MAXWAIT=6 
406 POKE 654,0:POKE 657,33? 7-MAXHALT 

408 FOR I=1 TO 100:NEXT I 

410 GOTO 402 

420 POSITION 5,16:? #43" "POSITION 
3,173? 467" p 

430 IF SCORE>MAXSCORE THEN MAXSCORE=SCORE 
440 RETURN 

499 REM JOYSTICK SUBROUTINE 

500 SØ=STICK(0) IF 50=15 OR 50=13 THEN RETURN 


510 S=ASC(ST$(S0-4) ) RETURN 

599 REM BURP SUBROUTINE 

600 POKE 77,0:X=1:Y=03FOR K=1 TO 4$X=X+1iY=Y+ 
1IPOSITION X,¥3? #4;BP$(K,K) NEXT K 

620 FOR K=250 TO 150 STEP -34S50UND 0,K,2,105N 

EXT K 

630 X=1:Y=03FOR K=1 TO 44X=X+1Y=Y+1 POSITION 
X,Y$? 463" "NEXT KERETURN 

699 REM CHANGE DISPLAY LIST 

700 A=PEEK(560)+256PEEK (561) SPOKE A+3,198:P0 
KE At15,1343POKE 4+24,134 

710 IF PEEK(A)<>64 THEN A=A+1:G0T0 710 

720 FOKE A,713POKE A+3,7:POKE At4,45:POKE At+5 
»PEEK(A+7) SPOKE A+6, PEEK(A+8) 

722 POKE 512,54 :POKE 513,43POKE 54286,192 
730 POKE 656, 0:FOKE 657,34? 7-MAXHAITIPOKE 65 
6, 03POKE 457,153? MAXSCORE 

740 POSITION 2,193? #4;"dif score high"$RET 
URN 

800 REM X-Y INCREMENTS & STARTING FOS. 

801 DATA 1,-1,0,18 

802 DATA 1,0,0,9 

803 DATA 1,1,0,0 


804 DATA 0,1,9,0 

805 DATA -1,1,18,0 

806 DATA -1,0,18,9 

807 DATA ~1,-1,18,18 

900 REM PRINT EYES ON FROG 

901 X$=X9$3YS=79$!2 #4$") )"SRETURN 

902 X$=X1191Y$=Y11632 461" ("RETURN 

903 X$=X10$1V4=Y1093? $43" 4" RETURN 

904 X$=X14$1V$=Y1461? 461"6 $" RETURN 

905 X$=X6$1V$=Y6$17 463 "% 2" SRETURN 

906 X$=X7$1Y$=Y761? 461"A 8" RETURN 

907 X$=XS$1Y$=Y5S1? 461" "RETURN 

999 REM TONGUE ROUTINE 

1000 I=0 

1001 I=I+1{IF 1=8 THEN 1010 

1002 POSITION ASC(X$(I)) ,ASC(YS(T) IGET 44,4! 
C$(1,1)=CHR$(A) 

1004 POSITION ASC(X$(I)) ,ASC(YS(I)) $? $43 CHRS 
(13) SOUND 0,7-1,8,8:1F A=129 THEN GOTO 105¢ 
1005 GOTO 1001 

1010 I=I-111F I=0 THEN 107° 

1012 POSITION ASC(X$(I))ASC(YS(I))1? 461C0$(1 
,1) {SOUND 0,7-1,8,8:G0TO 1010 

1020 IF BURP=1 THEN GOSUE 600:BURP=0 

1022 SOUND 0,0,0,0RETURN 

1049 REM GOT A BUG 

1050 F(S)=0 | 

1060 SCORE=SCORE+10%(7-MAXHAIT) {POKE 656,0:F0 
KE 657,83? SCORE} "tNUMBUG=NUMBUG-1 

1070 IF SCORE>BOMUS THEN MAXMALT=MAXHALT-1MA 
XBUG=MAXBUG-5? BONUS=BONUS+100%(7-MAXMALT) ! BUR 
F=] 

1072 IF MAXBUGGS THEN MAXBUG=5!MAXHAIT=1 

1080 POKE 658,01POKE 657,31? 7-MAXWAIT 

1090 CSCL, D=" "t1=I+106070 1010 

1999 REM PRINT FROG SUBROUTINE 

2000 POSITION 6,432 461"+x- -+x" POSITION 6,7 
19 46-30 [POSITION 6,81? 46) "4+———" 
2010 POSITION 6,93? 481"—x +—"1POSITION 5,1 
01? 461 "+-4—-X-1" 

2020 POSITION 5,111? 46;"---—-- "SRETURN $R 
EM INVERSE CHAR. IN THIS LINE 

2999 REM CHANGE CHAR. SET SUER. 

3000 DIM ZZ$(32) RESTORE 3010:FOR I=1 TO 32:R 
EAD A!Z7$(T)=CHR$(A) NEXT I 

3010 DATA 104,104,133,204,104,133,203,104, 133 
1206,104,133,205,162,4,160,0 

3020 DATA 177,203,145,205,136,208,249,230,204 
,230,206,202,208, 240,96 

3030 POKE 104,PEEK(106)-5!GRAFHICS 01START=(P 
FER(L04)+1)"256:POKE 756,START/254:PORE food 
TPINITIALIZING 


n 
ttt 


3040 A=USR(ADR(ZZ$) 97344 START) ‘RESTORE 3100 
FOR I=START+8 TO START+119 READ ASPOKE LAN 
EXT I 

3050 RETURN 

3100 DATA 0,34,85,62,54,85,34,0,0,102,102,102 
+0,0,0,0+2555241,241,241,129,129, 235, 255 

3110 DATA 255,189,189,189,129,129, 255, 259, 299 
143,143,143,129,129,255, 2501 2009127,143,143, 
143,129,255, 239 

3120 DATA 255,129+129,143,143,143, 255, 259, 209 
129,241,241,241,129,255, 250, 2009 129,129 291, 
241,241,259+ 200 

3130 DATA 240,240,240,240,240,240,240,240,15, 
15,15,15,15,15,15,15,0,0,0,0,0,24,24,48 

3140 DATA 255,255,299, 295,255,259, 255,255,205 
» 145,145,255, 14959145, 23509 299 


SONGS AND RAINBOWS IN 
ATARI PILOT 
by Ruth Ellsworth 


As a beginning programmer, I have been a little intimidated 
by sound and graphics. It was an exciting discovery for me to 
find that I could easily "sing a rainbow" in Atari Pilot, 


I needed a program to demonstrate sound in Pilot, and my 
first plunge into sound and graphics took only about 2 hours to 
program. The program which I have refined and which is 
included at the end of this article is used to demonstrate the 
sounds available in Atari Pilot and their corresponding keys on 
a piano, 


I began by drawing a rectangle and the lines to separate 
the keys so that I needed only one "use module" to indicate 
black keys. Then I erased one pixel and restored it to indicate 
the key being played. 


After using the program I decided I wanted something a 
little more distinctive, so I decided to make each key 
separately and to change its color while being played. I found 
that the keyborad was made of only four different shaped keys 
which I then programmed into modules, except that the first 
key for balance to may eye needed an extra line along the 
straight edge which accounts for the five modules in the 
program, 


In order to get Pilot to run as fast as possible modules 
should be placed at the beginning of the program from the most 
used to the least used. It is also necessary to draw over 
shapes to change colors satisfactorily because the FILL 
command leaves a shadow of the color being covered. 


= Us+#COLORDEMO 
10 #COLORDEMO 
20 GRICLEAR 
30 C:8B712=0+4 [SET PEN ERASE 
TO NEW COLOR--0 GRAY 


The sound command is 50! followed by a number from 1 to 
31 indicating the desired note from low C to high F sharp, and 
the length of each note is set by PA: followed by 
126,64,32,16,8,4 corresponding to whole note, half note, 
quarter note, eighth note, sixteenth note, and thrity second 
note respectively. Pilot has four sound registers that aloow 
notes to be played individually or in chords. Each voice must 
be separated by a comma, and a 500 must be used to stop the 
sound if no other note or the Et command follows, 


When I first wrote the program I used the yellow, red, and 
blue colors usually available in PILOT, I then discovered that 
the color commands are simple and it is possible to get a wide 
variety of colors just by poking new colors into the four color 
pen registers available. One only has to remenber that the 
background color is PEN ERASE. C!@B712=xx assigns color to 
PEN ERASE, C!QB708=xx assigns color to PEN RED, 
Ci@B709=xx assigns color to PEN YELLOW, and C:QB710=xx 
assigns color to PEN BLUE. Luminance is determined by the 
numbers 0 to 7 allowing a great variety of colors although only 
15 colors are available. I found, also, that the colors varied 
with those that surrounded them, so that the range of colors is 
greater than might at first appear. Color registers are 
calculated as follows! color register=color number times 16 + 
luminance times 2. The following short program demonstares 
the 15 colors available in middle luminance and how the color 
register works better than I could possibly explain it. My 
children drew boxes into the on to the screen and and pokes 
other colors into the pens to see how the different colors 
looked together. 


PILOT sound and turtle graphics have not only been fun for 
us as family, but have helped graphics and sound in general 
make more sense. I cannot recomment PILOT as a beginning 
language for anyone interested in programming and as an 
introduction to other sturctured languages, 


HHA EHH 
290 xBLACKKEY 


40 GRIPEN ERASE 

45 PAIO 

50 C18B712=14+4 [1 LIGHT ORANG 
E 

60 GRIPEN ERASE 

70 PAI90 

80 C1Q8B712=32+4 [2 ORANGE 

90 PAIO 

100 C1QB712=46+4 [3 RED ORANGE 
110 PAI76 

120 Ci@B712=44+4 [4 PINK 

130 PAI90 

140 C{@B712=80+4 [5 PURPLE 

150 PA:70 

140 Ci@B7127=94+4 [4 PURPLE-BLU 
E 

170 PA70 

180 C1QB712=112+4 [7 BLUE 

190 PAI70 

200 C1QB712=128+4 [$ BLUE 

210 PA90 

220 C1QB712=144+4 [9 LIGHT BLU 

E-DEFAULT COLOR 

230 PAI70 

240 Ci@B712=1460+4 [10 TURQUOIS 

E 

250 PAO 

240 C1QB712=174+4 [11 GREEN-BL 
UE 

270 PAI90 

280 C1QB712=1%4+4 [12 GREEN 

270 P4A:90 

300 C{QB712=208+4 [13 YELLOW-G 
REEN 

310 PAS90 

220 C1QB712=7224+4 [14 ORANGE-G 
REEN 

330 PAI90 

340 C1QB712=240+4 [15 LIGHT OR 

ANGE 

350 PAI70 

340 J+COLORDEMO 

370 Ei 


J RSOUND DEMONSTRATION 

10 GRICLEAR 

20 C:06712=128+0CPEN ERASE - BACKGROUND - DAR 
K BLUE 

30 C+0B709=0+0 [PEN YELLOW - BLACK 

40 C+0B710=144+14 [PEN BLUE - WHITE 

50 C+@B708=48+0 [PEN RED - DARK ORANGE RED 
60 US*KEYBOARD 

70 USXMUSIC 

80 xEBLKEY CERASE BLACK KEY 

FOGRs 2 (TURNTO180 5 DRAW 4; TURNTO?0 | DRAWL $ TURNTO 
0 DRAW1 4; TURNTO70 DRAHÍ ) 

100 GRY TURNTO180 ;DRAW14 

110 E; 

120 XELEFTSK CERASE LEFT STRAIGHT KEY 

130GR2 (TURNTO180 ; DRANZS 5 TURN-90 ; DRAW] $ TURNTO 
0; DRAWZ5; TURN9O ; DRAW1) ; TURNTO180 ; DRAKZ5 
140GR+ TURN-90 ; DRAW ; TURNTOO ; DRAWLO ; TURNY0 [DRA 
Wi; TURNTO180 ;DRAWLO 

150 E; 

160 EFKEY LERASE FIRST KEY 

17 OGR + TURNTOO [ DRAWZ5 52 ( TURN90 ; DRAKT ; TURNTO180 
s DRAKZ5; TURN-90 ; DRAH $ TURNTOO ;DRANZ5) 

180 GRITURN90;DRAKI ; TURNTO180 ; DRAWZS 

190GR I TURNTO90 ; DRAWL $ TURNTOO S DRAWLO $ TURN?0 5 DR 
AW; TURNTO180 ;DRAW10 

200 E$ 

210 *EKBTWN [ERASE KEY BETWEEN 

220GR: TURNTO180 ; DRAH25; TURN 0 ; DRAKT ; TURNTOO 5D 
RAKLO ; TURN-90 DRAH ; TURNTO180 ; DRAW10 ; TURNTO70 
DRAWS 

230GR i TURNTOO ; DRAWZ5 5 TURN 0 ; DRAK1 $ TURNTO180;D 
RAWZ5; TURNTO?0 S DRAW] ; TURNTOO ; DRAW1 0 ; TURN?0 5 DR 
Abi; TURNTO180 ;DRAW10 

240 E; 

250 MERSK CERASE RIGHT STRAIGHT KEY 

260GR‘ TURNTO180  DRAWZ5 ; TURN?0 ; DRAMA ; TURNTOO ;D 
RAW10; TURN-90 ; DRAKL $ TURNTO180 ; DRANLO ; TURNTOY 0 
+ DRAH 

270GR; TURNTOO ; DRAM2Z5; TURNT0 ;DRAW1 $ TURNTO180;D 
RANZ TURN-90 ; DRAWL ; TURNTO0 ; DRAHZ5 ; TURNT0 [DRA 
Wi; TURNTO180 ;DRAMZS 

280 E; 
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J00GR I TURNTO90 DRAW; TURNT0 ; DRAW14 ; TURNT0 [DRA 
W4; TURNYO;FILL14CBLACK KEY 

310 E; À 

320 XLEFTSK 

S30GR i TURNTO90 DRAKY 5 TURN? 0 $ DRAWS ; TURNTO70D 
RANZ; TURN70 ;DRAW1 0; TURN? 0 ;DRAW4; TURNTOO 

340 GRIFILL25 CWHITE KEY LEFT STRAIGHT EDGE 
350 E; 

360 XRIGHTSK 

37 OGR 4 TURNTO90 DRAWA TURNTO180 5 DRAWZS ; TURN?0 
3B0GR I DRANG $ TURNTOO [FILL 10; TURNTO90; DRAWZ ; TUR 
NTOO;FILLASLWHITE KEY STRAIGHT WHITE EDGE 
390 Et 

400 *KEYBETWEEN 

41 0GR å TURNTO90 ; DRANZ ; TURN90 ; DRAW15 5 TURNTO90;D 
RANZ $ TURNTO180 } DRAW10 ; TURN90 

420 GRIDRAMG;TURNTOO 5 FILL10 5 TURNTO0 ; DRAWZ 5 TU 
RNTOO;FILLISCWHITE KEY BETWEEN BLACKEYS 

430 Et 

440 xFIRSTKEY 

450GR i TURNTO90 ; DRAWS ; TURN90 ;DRAW15 5 TURNTO90;D 
RAWZ 5 TURN90 ;DRAWL 0; TURN? 0 ; DRAK7 ; TURNTOO 

460 GRIFILL25 CWHITE KEY LEFT STRAIGHT EDGE 
470 E; 

480 XEKETWN 

APOGR I TURNTO180 ; DRAWZ5 } TURN?0 DRAHÍ $ TURNTOO;D 
RAHLO ; TURN-90 ; DRAK1 $ TURNTO180 ;DRAWLO; TURNTO?0 
> DRAW 

SOOGRS TURNTOO ; DRAWZS ; TURN? 0 ; DRAHÍ $ TURNTO180 ;D 
RAWZS } TURNTO90 ; DRAW $ TURNTOO ; DRANLO ; TURNT0 ; DR 
AW]; TURNTO180 ;DRAWLO 

510 E; 

520 XKEYBOARD 

530 GRIPENBLUE;GOTO-75,25 [KEY 1 

540 US«FIRSTKEY 

550 GRIPENYELLON;GDTO-69,25 [KEY 2 

560 USXBLACKKEY 

370 GRIPENBLUE;GOTO-64,25 [KEY 3 

580 USXKEYBETWEEN 

590 GRIPENYELLON;GOTO-61,25LKEY 4 

600 US BLACKKEY 

610 GRIPENBLUE;GOTO-54,25 [KEY 5 

620 UTXRIGHTSK 


630 GRIPENBLUE}GOTO-50,25 [KEY 6 
640 US LEFTSK 

650 GRIPEN YELLOW;GOTO-45,25 [KEY 7 
660 US*BLACKKEY 

670 GRIPENBLUE}GOTO-40,25 

680 U3 xKEYBETWEEN 

690 GRIPEN YELLOW}GOTO-37,25 [KEY 9 
700 USBLACKKEY 

710 GRIPEN BLUE;GOTO-32,25 CKEY 10 
720 US*KEYBETWEEN 

730 GRIPEN YELLOW;GOTO-29,25 CKEY11 
748 USSBLACKKEY 

750 GRIPEN BLUE;GOTO-24,25 CKEY12 
760 UVXRIGHTSK 

770 GRIPEN BLUE;GOTO-18,25 CKEY13 
780 USSLEFTSK 

790 GRIPEN YELLOH;GOTO-13,25 CKEY14 
800 UiXBLACKKEY 

810 GRIPEN BLUE;GOTO-8,25 CKEY15 
820 Ut xKEYBETWEEN 

830 GRIPEN YELLOW;GOTO-S,25 CKEY16 
840 U3 xBLACKKEY 

850 GRIPEN BLUE}GOTO0,25 CKEY17 
860 U$*RIGHTSK 

870 GRiPENBLUE}GOT06,25 [KEY18 

880 US LEFTSK 

890 GRIPENYELLON;GOTO11,25 CKEY19 
900 US*BLACKKEY 

910 GRIPENBLUE;GOTO16,25 [KEY 28 
920 US xKEYBETWEEN 

930 GRIPENYELLOM;GOT019,25 [KEY 21 
940 UNBLACKKEY 

950 GRIPENBLUE;G0T024,25 [KEY22 
960 USSKEYBETHEEN 

970 GRIPEN YELLOW;GOT027,25 [KEY23 
980 US BLACKKEY 

990 GRIPENBLUE;GOT032,25 [KEY24 
1000 US *RIGHTSK 

1010 GRIPEN BLUE;G0T038,25 CKEYZ5 
1020 US"LEFTSK 

1030 GRIPEN YELLOM;GOT043,25 [KEY26 
1040 U3 xBLACKKEY 

1050 GRIPEN BLUE;GOT048,25 [KEY 27 
1060 UtXKEYBETWEEN 

1070 GRIPEN YELLOW;GOT051,25 

1080 UtXBLACKKEY 

1090 GRIPEN BLUE;G0T056,25 CKEY29 
1160 U3sRIGHTSK 

1110 GRIPEN BLUE;G0T062,25 [KEY 30 
1120 USLEFTSK 

1130 GRIPEN YELLOW}GOTO47,25 CKEY31 
1140 UNBLACKKEY 

1150 E; 

1150 xMUSIC 

1170 T3TYPE 1 TO9,AND THE LETTERED KEYS 
1180 T3FOR NOTES LOW C TO HICH F 
1190 TITYPE M TO END PROGRAM 

1200 A:45 

ASD F GH Se KrLZ eX oC 

1220 SMV, 23, 4 5, 16,07 1819 10, 20, REX 
R xT YA DF GH KM 
Ly XZ AX AGN 

1230 x1 

1240 GRIPENRED;GOTO-75,0 

1250 US xEFKEY 

1260 SO%1 

1270 PA:32 

1280 500 

1298 GRIPENBLUE;GOTO-75,0 

1300 US SEFKEY 

1310 J3sMUSIC 

1320 x2 

1330 GRIPENRED;GOTO-49, 25 

1340 US XEBLKEY 

1350 $032 

1360 PA:32 

1370 50:90 

1380 GRIPENYELLOM;GOTO-49,25 

1390 US XEBLKEY 

1400 J¢xMUSIC 

1410 x3 CLOW D 

1420 GRIPENREDGOTO-64,25 

1430 U3*EKBTWN 

1440 S033 

1450 PA:32 


1440 50:0 
1470 GRIPENBLUE;GOTO-64,25 
1480 USxEKBTHN 

1490 JSxMUSIC 

1580 x4 [LOM D SHARP OR E FLAT 
1510 GRIPENRED;GOTO-61,25 
1520 USxEBLKEY 

1530 S034 

1540 PA!32 

1550 50:0 

1560 GRIPENYELLON;GOTO-61,25 
1570 UtxEBLKEY 

1580 JSxHUSIC 

1590 x5 CLOW E 

1600 GRIPENRED;GOTO-56,25 
1610 USKERSK 

1628 50:5 

1630 PA32 

1640 S030 

1650 GRPENBLUE;GOTO-56,25 
1660 USÆERSK 

1670 JsxMUSIC 

1680 x4 CLOW F 

1690 GRIPENRED;GOTO-50,25 
1700 USXELEFTSK 

1710 50:6 

1720 PA:32 

1730 50:0 

1740 GRIPENSLUEGOTO-50,25 
1750 USXELEFTSK 

1768 USxMUSIC 

1770 x7 CLOW F SHARP OR G FLAT 
1780 GRIPENRED;GOTO-45,25 
1790 USEBLKEY 

1800 50:7 

1810 PA:32 

1820 50:0 

1830 GRIPENYELLON;GOTO-45,25 
1840 USxEBLKEY 

1850 JSxMUSIC 

1868 xB CLOW G 

1870 GRIPENRED;GOTO-40,25 
1880 U: XEKBTHN 

1890 50:8 

1900 PA:32 

1910 50:0 

1920 GRIPENBLUE;GOTO-40,25 
1930 USXEKBTHN 

1940 UsxMUSIC 

1950 x9 [LOM G SHARP OR A FLAT 
1960 GRIPENRED;GOTO-37,25 
1970 UIXEBLKEY 

1980 S039 

1990 PA:32 

2000 S0:0 

2010 GRIPENYELLOM;GOTO-37,25 
2020 USXEBLKEY 

2030 JYxMUSIC 

2040 x0 CLOW A 

2050 GRIPENRED;GOTO-32,25 
2060 U$ XEKBTHN 

2070 S0:10 

2080 PA:32 

2090 50:0 

2100 GRIPENBLUE;GOTO-32,25 
2110 USXEKBTH 

2120 JYMUSIC 

2130 xW CLOW A SHARP OR B FLAT 
2140 GRIPENRED;GOTO-29,25 
2150 USEBLKEY 

2160 50:11 

2170 PAS32 

2180 50:0 

2198 GRIPENYELLOM;GOTO-29,25 
2200 UtXEBLKEY 

2210 JtxMUSIC 

2220 XE [LOM B 

2230 GRIPENRED;GOTO-24,25 
2240 USHERSK 

2250 0:12 

2260 PA!32 

2270 S0:0 

2280 GRIPENBLUE}GOTO-24, 25 
2290 UYMERSK 

2300 UtxMUSIC 

2310 xR (MIDDLE C 


2320 GRIPENRED;GOTO-18,25 
2330 US XELEFTSK 

2340 50:13 

2350 PA:32 

2360 50:0 

2370 GRIPENBLUE;GOTO-18,25 
2380 Us XELEFTSK 

2390 JixMUSIC 

2400 xT CC SHARP OR D FLAT 
2410 GRIPENRED;GOTO-13,25 
2420 US EBLKEY 

2430 50:14 

2440 PA: 32 

2450 S0:0 

2460 GRIPENYELLOW;GOTO-13,25 
2470 USEBLKEY 

2480 J? xMUSIC 

2490 xY [D 

2500 GRIPENRED;GOTO-8, 25 
2510 Us XEKBTWN 

2520 50:15 

2530 PAS32 

2540 50:0 

2590 GR*PENBLUE;GOTD-8, 25 
2560 US *EKBTHN 

2570 J xMUSIC 

2580 xU [D SHARP OR E FLAT 
2590 GRIPENRED;GOTO-5, 25 
2600 Ut *EBLKEY 

2610 SO316 

2620 PAS32 

2630 500 

2640 GRIPENYELLOW;GOTO-5, 25 
2650 US*EBLKEY 

2660 JØMUSIC 

2670 xI [E 

2680 GRIPENRED;GOTOO, 25 
2690 US XERSK 

2700 50:17 

2710 PAS32 

2720 S00 

2740 GRIPENRED;GOT06,25 
2750 US*ELEFTSK 

2760 x0 [F 

2770 GRIPENRED;GOT06, 25 
2780 US XELEFTSK 

2790 50:18 

2800 PA:32 

2810 50:0 

2820 GRIPENBLUEGOTO06,25 
2830 US SELEFTSK 

2840 JixMUSIC 

2850 GR+FENERASE;GOTO11, 25 
2860 xP [F SHARP OR G FLAT 
2870 GRIPENRED;GOTO11,25 
2880 U}*EBLKEY 

2890 50:19 

2900 PA:32 

2910 50:0 

2920 GRIPENYELLOM;GOTO11,25 
2930 US*EBLKEY 

2940 JEMUSIC 

2950 xA [G 

2760 GRIPENRED;GOT016,25 
2970 USSEKBTWN 

2980 50:20 

2990 PA:32 

3000 S0:0 

3010 GRIPENBLUE;GOTO016,25 
3020 USEKBTHN 

3030 J xMUSIC 

3040 xS [G SHARP OR A FLAT 
3050 GRIPENRED;GOT019,25 
3060 US*EBLKEY 

3070 50:21 

3080 PA:32 

3090 50:0 

3100 GRYPENYELLOW;GOT019, 25 
3110 Us xEBLKEY 

3120 J xMUSIC 

3130 xD [ À 

3140 GRIPENRED;GOT024, 25 
3150 USSEKBTHN 

3160 50:22 

3170 PA:32 

3180 50:0 

3190 GRIPENBLUE;GOT024,25 


3200 UtXEKBTHN 
3210 JtxMUSIC 
3220 xF LA SHARP OR B FLAT 
3230 GRIPENRED;C0T027,25 
3240 UNEBLKEY 
3250 50:23 
3260 PA!32 
3270 50:0 
3280 GRIPENYELLOM;GOTO27 ,25 
3290 UtEBLKEY 
3300 JtxMUSIC 
3310 xG 0B 
3320 GRIPENRED;COT032, 25 
3330 UtxERSK 
3340 50:2 
3350 PA!32 
3360 50:0 
3370 GRIPENBLUE}GOTO32, 25 
3380 UtxERSK 
3390 JtxMUSIC 
3400 xH CHICH C 
3410 GRIPENRED;COT038,25 
3420 UNXELEFTSK 
3430 90:2 
3440 PA!32 
3450 50:0 
3460 GRIPENBLUE;GCOTO38, 25 
3470 UtKELEFTSK 
3480 JOMUSIC 
3490 xJ CHICH C SHARP OR D FLAT 
3500 GRIPENRED;GOT043,25 
3510 UtxEBLKEY 
3520 50:2 
3530 FA!32 
3540 50:0 
50 GRIPENYELLO;GOTOA3, 25 
3560 UtxXEBLKEY 
3570 JtxMUSIC 
3580 xK [HIGH D 
3590 GRIPENRED;GOT048,25 
3600 USXEKETHN 
3610 S0:2 
3620 PA!32 
3630 S030 
3640 GRIPENBLUE!GOTOAB, 25 
3650 UtxEKBTHN 
3660 JtxMUSIC 
3670 xL [HIGH D SHARF OR E FLAT 
3680 GRIPENRED;COTOS1, 25 
3690 U$ XEBLKEY 
3700 50:28 
3710 PA!32 
3720 S0:0 
3730 GRIPENYELLOM;COTOS1,25 
3740 UtxEBLKEY 
3750 JYxMUSIC 
3760 xZ CHICH E 
3770 GRIFENRED;GOT054,25 
3780 UtxERSK 
3790 S0:2 
3800 FA!32 
3810 50:0 
3820 GRIFENBLUE;COT056,25 
3830 UtXERSK 
3840 JtxHUSIC 
3850 xX [HIGH F 
3840 GRIPENRED;COT062,25 
3870 UtXELEFTSK 
3880 50:30 
3890 PA!32 
3900 50:0 
3910 GRIPENBLUE!COT042, 25 
3920 UIXELEFTSK 
3930 JHMUSIC 
3940 xC CHICH F SHARP 
3950 GRIFENRED;GOT047,25 
3960 UtEBLKEY 
3970 0:31 
3980 PA!32 
3990 S0:0 
4000 GRIPENYELLOK:GOT067,25 
2010 UtxEBLKEY 
4020 JHXMUSIC 
4030 xM CEND PROGRAM OPTION 
4040 50:0 
2050 E! 





REVIEW: MICRO- PAINTER 
(DataSoft, 19519 Business Center Dr., Nothridge, CA 91324, 
$35) 

review by Graham Smith 


Datasoft's MICRO-PAINTER is a new and incredible 
graphics program for the Atari. This machine language 
program is very flexible and easy to use. With little practice 
and a thorough reading of the excellent manual anyone can 
create computer art of varied complexity, 


Booting the disk reveals an Options Menu which lists! 
Catalog, Load File, Save File, Lock File, Unlock File, Delete 
File, and Rename File, If you pick the Catalog option 9 
pre-designed picture titles appear on the screen from which to 
choose, Loading any of these pictures will show a white 
background with black outlines of the subject matter. This 
looks identical to what you see in a child's coloring book. 
Along the top of the screen is å horizontal bar which shows one 
of 3 modes in use, a selection of 4 patterns (horizontal stripe, 
vertical stripe, checkerboard, and solid), and 4 basic colors 
from which to choose, 


In the Fill mode usually used in the "coloring book" 
designs, the joystick is used to move a cursor into a selected 
pattern or color area at the top of the screen and the joystick 
button is pressed. This is similar to dipping a brush in paint, 
The cursor is then moved into a selected area of the design and 
the button is pressed again to fill the area. If you don't like 
what you see happening you press the BREAK key and the fill 
action is aborted, If the filling is completed and you don't like 
it, hit the U key (undo) and the fill disappears, 


The mode selection, which is controlled by the SELECT key, 
consists of the Fill mode as well as a Draw mode and a Rubber 
Band line mode: The Draw mode enables you to "dip" the 
cursor into a color and use the joystick to create lines on 
existing patterns or new line drawings. Since the joystick 
movement is not linear, I found the Draw mode very hard to 
control, 


The Rubber Band line mode is unique and offers pin-point 
control. In this mode the cursor is moved to the starting point 
of a line and the joystick button is pressed to anchor the line. 
The line then follows the cursor wherever it is moved on the 
screen. When you get the line precisely where you want it you 
have only to press the joystick button to complete the line. 
Great control is possible, 


In any of the 3 modes, hitting the SPACE BAR will shift the 
screen into a Microscope option. Here you move from full 
screen to a magnified view of a selected area with the cursor, 
Microscope is an excellent tool for making close-up additions 
and corrections to a picture, 


There are many fine extra touches in the program, One 
control worth mentioning from a creative standpoint is the 
ability to hit the N key and immediately see the entire picture 
in complimentary colors. Another control allows you to change 
any or all of the 4 basic colors and luminosities, 


The outline patterns included in the package are good for 
learning to control MICRO-PAINTER but they do not do much 
for the creative artist, Coloring books are more copying than 
creating» However, any of the patterns can be erased from the 
screen with the SHIFT-CLEAR key. The erased screen then 
allows you to use all 3 modes to create your own design. This 
is where the fun begins, 


In my own creations I drew almost entirely with the Rubber 
Band mode, frequently shifting to Microscope for fine control. 
I usually followed with the Fill mode and occasionally shifted 
back and forth between modes to "fine tune" the design. To 
complete the design, I then used the color shift control before 
Saving to disk. 


This is a superior program. The documentation is fully 
illustrated, intelligently written, and easy to follow. My only 
reservation is that MICRO-PAINTER seems to me to 
emphasize the “coloring book" or copy approach which is 
somewhat less than creative. On the other hand, maybe the 
designers were trying to create a product with something for 
everyone, I think they succeeded, 


Atari Pascal 
by George Shields, Spokane, WA 


The new APX Pascal contains the latest ISO draft 
standards, which is the de-facto in the Pascal world ie. 
Microsoft, Some features similar to BASIC are graphics, I/O 
commands, arithmetic precision i.e. 8 digit +-100 exponent ( 
using FP in ROM ), external programs moduals linked froma 
library, and indefinite length programs ( by chaining them. 
together » 


First let it be perfectly clear that two disk drives are 
required and 48K of memory. Double density drives would be 
the best due to the default of drive 1 ( From Percom or the 
Leading Edge ) Also some kind of text editor is necessary i.e, 
Text Wizard, APX MEDIT, ATARI Editor Assembler, Extremely 
useful is a 80 col. printer due to the limited screen (40 coli), 
where as Pascal programs are written in 80 column format: 


While its true that Pascal is more difficult to learn than 
BASIC (recomended before Pascal) It does have a place for 
students learning computer data structures, or in house 
business developments. The lanuages of the future will be 
patterned simliar to Pascal ( Touch the future ). 


Why use Pascal? Well it is much faster than BASIC ( 3-8 
times faster, like FORTH ). It has a block structure that is 
practically self documenting, expanded commands ( common with 
other high level languages ) that give greater control over a 
program, and the ability to define the data type your working 
with ie. integer operation. 


Some of the drawbacks include the following: it requires a 
lot of previous knowlege of Pascal ( see book list ), There is 
not the usually long variable names ( your limited to 8 char. or 
5 for external files ). It does not have a 80 column editor for 
writing the Pascal programs like Chameleon or DATASM/65, If 
anything goes wrong there is a possiblity the system may lock 
up.» The output printing isn't very fast but of a more constant 
speed than BASIC, APX Pascal is very disk bound» For 
example, disk one ( the linker ) has only 229 free sectors for 
program space. Disk two (the compiler ) has only 17 free 
sectors. This combined with the default of the linker on drive 1 
and the default of the compiler on drive 1 causes lots of disk 
changing, that can be very confusing. You then have your 
program on drive 2. This is because of the large memory 
requirments of Pascal so you can have enough room for all the 
files produced by the compilier. In fact most Pascal systems 
require a minimum of 64K of memory, so it was quite a task to 
implement a full version. 


Over all, this is a real bargain, It is a fine implimention of 
the Pascal language with no bugs (yet). The manual is adequate 
for those KNOWING Pascal but leaves a lot to be desired for 
those used to ATARI quality type documentation. I would 
encourage some one to write a machine language compiler for 
Pascal, Even though the p-code approches machine lanquage, 
you still need two fair size programs to run the p-code. Pascal 
is well worth while, once you spend the time learning it 
because it can cut your program development down by a factor 
of eight due to the block structuring, 


Books recommended: 
Programming IN PASCAL BY Peter Grogono, or Introduction To 
PASCAL BY Rodnay Zaks 


NEXT MONTH: A PARALLEL DOUBLE DENSITY DRIVE by 
Leading Edge 





DECODE FUNCTION 


Bill Wilkinson, in his InsightiAtari column in the October, 
1981 issue of COMPUTE, describes a way to create unreadable 
(actually, unLISTable) BASIC programs. He does this by 
stuffing linend characters (nulls would do as well) in the 
variable name table in the header of the tokenized BASIC 
program. It works marvelously! 


If you want to be able to read and edit one of these "coded" 
programs, you must decode it by putting dummy names in the 
name table, The DECODE function described here does this 


Scalars - SCi 
Strings - STi 
Arrays - ARi 


where the value of i is assigned sequentially. 


The DECODE program asks you for the name of a file 
containing the tokenized BASIC program. It will then prompt 
you for the name of the file in which to SAVE the DECODED 
program. DECODE should work on any program, whether it has 
been encoded or not: 


automatically. Dummy names are assigned as follows: 


10 REM IOA 

20 REM xx UTILITY FOR RESTORING x 

30 REM xCLOBBERED VARIABLE NAMES 

40 REM xxxIN BASIC PROGRAMSxxx 

50 REM xxx 5, GREENBERG XXX 

60 REM xxx MARCH, 1982 xxx 

70 REM xno OOOO 

80 DIM 1$(1024) ,0$(1024)  FNAMEIS (16)  FNAMEDS( 


16) ,HOR(7) 

90 ? "3"3? "PLEASE WAIT ..."sGOSUB 1000 

110 FNAMEIS=" "FNAMEDS=FNAMEI 
$ 


120 2 "34? "949 “ENTER BASIC FILE SPEC" 

130 ? une "z="; 

140 TRAP 140:INPUT FNAMEIS 

150 TRAP 4000030PEN 42,4, 0,FNAMEIS 

160 ST=LIAR=19SC=13I$(1)=" "8I$(1000)=" "880 

2)=1$106="" 

170 A-USR(1658,ADR(1$),14,2,7) {REM READ HEADE 

R RECORD 

180 IF AO0 THEN END 

190 FOR I=1 TO 7$HDR(ID=ASC(I$(28(I-1)+1))+25 

HRASC (I$ (241) )SNEXT I 

250 REM READ THE VALUE TABLE TO DECODE THE TY 

PE OF VARTABLE | 

255 REM AND STORE DUMHY NAMES TO BE WRITTEN I 

NTO NAME TABLE 

260 VTLEN=HOR(3)-HDR( 2) ! WWLEN=HDR(5)-HDR(4) IN 

VARS=INT(VWLEN/8) IF NVARS=0 THEN END 

265 REM SKIP OVER VARTABLE NAME TABLE AND REA 

D VALLE TABLE 

270 A=VSRUL658,ADR(I$)  VTLEN+L,2,7) SA=USR (165 
8 ADR(I$) ,WLEN, 297) 


275 REM LOOP TO CREATE DUMMY NAMES 


280 FOR I=1 TO NVARSIPTR=1+(I-1 48 FBYTE=ASC( 
I$(PTR,PTR)) IF FBYTE=0 THEN 320 

290 IF FBYTE>=80 THEN 340 

300 O$(LEN(O$)+1)="AR"30$(LEN(0$)+1)=STR$ (AR) 
SAR=AR+1 

310 0$(LEN(0$)+1)=CHRS$ (148) GOTO 360 

320 O$(LEN(O$)+1)="SC"30$(LEN(0$)+1)=STR$(SC) 
$SC=SC+1 

330 PTR=LEN(O$) $0$(PTR)=CHRS$ (128+ASC (O$(PTR,P 
TR))) GOTO 360 

340 O$(LEN(0$)+1)="ST"0$(LEN(0$)+1)=STRS(ST) 
IST=5T+1 

350 O$(LEN(0$)+1)=CHR$ (144) 

360 NEXT I:DIFF=LEN(0%)-VTLENSVTLEN=LEN(0S) 
345 REM xxxxxx END OF LOOP oocpm 

370 FOR I=3 TO 7iHOR(ID=HDR(I)+DIFF NEXT I 
375 0$(LEN(O$)+1)=CHR$(0)3REM ADDS XTRA NULL 


BYTE 
380 ? "2 "1? "ENTER OUTPUT FILE SPEC" 
300 ? une “==>"5 


400 TRAP 4003 INPUT FNAMEDS 

410 TRAP 40000°0PEN $3,8,0,FNAMEDS 

420 FOR I=1 TO 7$HIGH=INT(HDR(1)/256) ;LOW-HOR 
(1)-2568HIGH 

430 PUT #3,LONSPUT 43, HIGHINEXT I 

440 A=USR( 1658, ADR(0$)  LEN(06) 3,11) REM WRIT 
E DUMMY NAME TABLE TO FILE 

450 A=USR(1658,ADR(1$)  WWLEN, 3,11) «REM WRITE 
VARIABLE VALUE TABLE TO FILE 

455 REM 00000 WRITE REST OF FILE woon 

440 RMDRFILE=HDR(7)-HOR(S) ¢NBLKS=INT (RMDRFILE 
/1024) SRMDR=RMDRF ILE-NELKSX1024 


by Stu Greenberg 


470 IF NELKS=0 THEN 500 

480 FOR I=1 TO NØLKSTA-USR(1458, ADR (1$) , 1024, 
2,7) 

490 A=USR(1658,ADR(1$) ,1024,3,11) SNEXT I 

300 A=U5R (1658, ADR(1$) ,RMDR» 2,7) AFUSR(1658, Å 
DR(T$)  RMDR, 3,11) 

510 END 

1000 FOR QYZ144=1536 TO 17293READ QYZ145+POKE 
QYZ144,QYZ145 NEXT QYZ144: RETURN 

1010 DATA 104,104,133,225,104,133,224,104,133 
+227 4104, 133,226,149 ,0,140 

1020 DATA 0,145,224,196,226,240,4,200,76,17,6 
196,104,104,133,225 l 

1030 DATA 104,133,224,104,133,227 104,133,226 
104,133,229,104,133,228,160 

1040 DATA 0,196,226,240,12,177,228,195,224,19 
6,226,240 ,4,200,76,53 

1050 DATA 6,166,227 ,224,0,240,50,165,224,24,1 
01,226,133,224,165,225 

1060 DATA 105,0,133,225,145,228,24,101,226,13 

3,228, 165,229, 105,0,133 

1070 DATA 229,177 ,228,1495,224,192,255,240,4,2 

00,76,97,6,202,240,9 

1080 DATA 230,225,230 ,229,160,0,76,97 6,96, 10 

4,104, 133,225, 104,133 

1090 DATA 224,104,133,227,104,133,226,104,104 
133,228,104,104,133,227,165 

1100 DATA 228,10,10,10,10,170,165,229 4157 ,66, 

34165,224, 157 68,3 

1110 DATA 165,225,157,69,3,165,226,157,72,3,1 

655227 1157 733,32 

1120 DATA 86,228,48,7,169,0,133,212,193,213,9 

6,169,0,133,213,132 

1130 DATA 212,96 


PAC-MAN 
review by Mark Norland 


ATARI has finally put out a cartridge based game which 
should rival the ever popular Star Raiders. The program is 
PAC-MAN, 


Pac-Man apparently uses character graphics to provide the 
user with a game very similar to the arcade version, but with 
some changes in features. 


ATARI Pac-Man has 3 minor differences and a major 
improvement over the arcade counterpart. The Galaxian and 
Pineapple are replaced by the ATARI trademark and a lime. 
There are no cartoon intermissions, a probable disappointment 
for our very young readers; and there is a different set of 
patterns used: 


The major improvement is the addition of a prize (fruits, 
keys, etc.) level selector for the advanced player. 


Pac-Man is a very entertaining program and should be 
added to your software collection: On a scale of 1 to 10, I rate 
Pac-Man an 8, 


--Mark C. Norland 
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Notes 


Hank Hirschfeld sent a message over the Bulletin Board 
that the setting up file for "Chicken Dressing" in the May ACE 
should be PRINT #7}0!: CLOSE #7 *##NOT###* INPUT 47,0: 


CLOSE #7, 


LET ME KNOW IF THE CONDENSED PRINT USED FOR THIS 
MONTHS LISTINGS ARE READABLE, Several readers felt the 
proportional print used before made it hard to read; perhaps 
this will be better. Please let us know what you want, 


If anyone has the new disk drives or other peripherals 
mentioned this month, please send a review: 


MUSICBOX by P.D.L+ 
(by Jerry White, P.D.I., 11 Idar Ct., Greenwich, CT 06830, $30) 


a review by Ron Ness 


I just had a chance to glance at a pre-release copy of this 
program, and if you are into music on the Atari, I am sure you 
will be interested in this disk. 


MUSICBOX is a group of music related programs written by 
Jerry White, Craig Patchett, and Charles Bachand. Required 
are BASIC, 32K, and a disk drive, The Music Composer 
cartridge is also required if you wish to take full advantage of 
all the programs on this disk: 


The most interesting program on this is one called 
COLORGAN, This turns your TV into a color organ which 
changes colors and intensity as the music plays. 


There are several samples of music on the disk including 
THE ENTERTAINER (played with only Z or 3 notes), SOLACE 
(played much too fast), STARS & STRIPES FOREVER (called 
March and sounds great!), and one called USSR. This last 
number has a rock beat which sounds super and has kept me 
awake for the last 3 nights trying to figure out where I have 
heard it before. [It's a BEATLES tune. --J B, ed] 


Another program called MUSICBOX uses a redefined 
character set to display the notes on the staff and show at the 
bottom of the screen the Music Composer values. With this 
program, you can sit down with a sheet of music and jot down 
the note values to be entered when using the Music Composer 
cartridge. I found this to be very helpful, 


Once you have written down the notes to be used with the 
Composer cartridge, you can plug it in and do your thing: When 
you are finished, you can go back to BASIC and debug using the 
DECOMPOS program or run off a printed copy to share with å 
friend. 


Now, assuming your music is up and running with the Music 
Composer cartridge, you can go to the CONVERT program and 
convert it so it can be read by the COLORGAN and PLAYTEST 
programs. 


This last program, called PLAYTEST, plays the music during 
the vertical blanks. The documentation and REMs explain how 
to merge your own program into this one, I haven't had time to 
fully check this out, but it appears you can have your Atari 
sing while balancing your checkbook. Can you imagine it 
playing ‘Happy Days Are Here Again’ for a deposit or the 
‘Triumphal March’ from Aida for an income tax refund? How 
about a sing-a-long complete with bouncing ball? 


There are a number of other features in this group of 
programs which are too numerous to go into here, such as note 
decay (sound fades away) and the use of the joystick or arrow 
keys to determine note values. These features allow you to 
put more ‘character and expression’ into your Music Composer 
based programs, 


The accompanying documentation assumes the user has a 
fair knowledge in the use of BASIC and the use of the Music 
Composer cartridge, With this in mind, I feel you will enjoy 
‘fiddling around’ with this disk: i 


ACE BB (502 93423-43524 


To use the ARMUDIC-ACE Bulletin Board, set your program 
to Light translation, Full Duplex, No send parity, Mark (ignore) 
receive parity, one Stop bit, and Baud rate 300, Until we get 
our full time board, it is up most nights from about 10 PM PDT 
until Brian rolls out of bed in the morning: If it rings more 
than once, it is down} but no-one will answer the phone: 


The next issve will be the combined 
Augq/Sept issue, SO send your 
articles in now; otherwise you will 
have to wait unt i il Oct +œ 
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Atari Computer Enthusiasts 


A.C.E. is an independent computer club and user’s group with no 


connection to the Atari Company, a division of Warner Communication 


if ENTHUSIASTS 
3662 Vine Maple Dr. Eugene OR 


Company. We are å group interested in education our members in the use 


97405 


of the Atari Computer and in giving the latest News, Reviews and Rumors, 


Tv > 
md 
nq 0 
Te 
33 
U > 
5 

+ 
"L 
a U 
tv 
mE 
Up 
ay 
å 

i. 
es 
kg > 
J, 
052 
aoe 
a, Ù 
doe 






Our membership is world-wide in scope} membership fees include the 


A.C.E, Newsletter. Dues are $10 a year for U.S., and $20 a year Overseas 


Airmail. 


FIRST 





President-Kirt Stockwell, 1910 Harris #139, Eugene, Or 97403 503-684-2470 


CLASS 
MAIL. 





Secretary-Charles Andrews, POB 1613, Eugene, Or 974401613 503-747-9892 





Librarian-Chuck and Jody Ross, 2222 Ironwood, Eugene, OR 97401 


503-343-5545 


Editors -Mike Dunn, 3662 Vine Maple Dr., Eugene, Or 97405 503-344-6193 
-Jin Bumpas, 1405 W. 26th Ave, Eugene, Or 97401 503-484-7723 
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